home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1997 April / macformat-049.iso / mac / Demos / Print Artist Demo / PA12-Mac.Dxr / 00183.ls < prev    next >
Encoding:
Text File  |  1996-10-03  |  570 b   |  21 lines
  1. on exitFrame
  2.   global playMode, loadNext, mainPageWait
  3.   startTimer()
  4.   puppetSound(0)
  5.   if (playMode = "64KMemOK") or (playMode = "PPCMemOK") then
  6.     if ramNeeded(label("Turn1"), label("Cards") + 3) < (the freeBlock - 1000) then
  7.       preLoad(label("Turn1"), label("Cards") + 3)
  8.       set loadNext to 0
  9.     else
  10.       preLoad(label("Turn1"), label("Turn1") + 6)
  11.       set loadNext to 1
  12.     end if
  13.     wait(mainPageWait)
  14.     go(#next)
  15.   else
  16.     preLoad(label("Turn1"), label("Turn1") + 2)
  17.     preLoad(label("Turn1") + 6, label("Turn1") + 6)
  18.     go(#next)
  19.   end if
  20. end
  21.